home *** CD-ROM | disk | FTP | other *** search
/ GRAVIS Top 100 #1 / GRAVIS CD No1_Herbst_94.cdr / Deneba / Canvas™ 3.5.2 US / Canvas Tools / Separations / Separations.rsrc / hd11_1104 < prev    next >
Text File  |  1994-05-20  |  7KB  |  600 lines
  1. %%BeginProcSet: Adobe_Illustrator881 0 0
  2. % Adobe Illustrator (TM) Prolog
  3. % Version 1.19 1/23/1989
  4. % Copyright (C) 1987, 1988, 1989
  5. % Adobe Systems Incorporated
  6. % All Rights Reserved
  7. currentpacking true setpacking
  8. userdict /Adobe_Illustrator881 72 dict dup begin put
  9. % initialization
  10. /initialize                % - initialize -
  11. {
  12. userdict /Adobe_Illustrator881_vars 29 dict dup begin put
  13. % paint operands
  14. /_lp /none def
  15. /_pf {} def
  16. /_ps {} def
  17. /_psf {} def
  18. /_pss {} def
  19. % text operands
  20. /_a null def
  21. /_as null def
  22. /_tt 2 array def
  23. /_tl 2 array def
  24. /_tm matrix def
  25. /t {} def
  26. % color operands
  27. /_gf null def
  28. /_cf 4 array def
  29. /_if null def
  30. /_of false def
  31. /_fc {} def
  32. /_gs null def
  33. /_cs 4 array def
  34. /_is null def
  35. /_os false def
  36. /_sc {} def
  37. /_i null def
  38. Adobe_Illustrator881 begin
  39. Adobe_Illustrator881
  40.     {
  41.     dup xcheck
  42.         {
  43.         bind
  44.         } if
  45.     pop pop
  46.     } forall
  47. end
  48. end
  49. Adobe_Illustrator881 begin
  50. Adobe_Illustrator881_vars begin
  51. newpath
  52. } def
  53. /terminate                % - terminate -
  54. {
  55. end
  56. end
  57. } def
  58. % definition operators
  59. /_                    % - _ null
  60. null def
  61. /ddef                % key value ddef -
  62. {
  63. Adobe_Illustrator881_vars 3 1 roll put
  64. } def
  65. /xput                % key value literal xput -
  66. {
  67. dup load dup length exch maxlength eq
  68.     {
  69.     dup dup load dup
  70.     length 2 mul dict copy def
  71.     } if
  72. load begin def end
  73. } def
  74. /npop                % integer npop -
  75. {
  76.     {
  77.     pop
  78.     } repeat
  79. } def
  80. % marking operators
  81. /sw                    % ax ay length string sw x y
  82. {
  83. stringwidth
  84. exch 5 -1 roll 3 index 1 sub mul add
  85. 4 1 roll 3 1 roll 1 sub mul add
  86. } def
  87. /ss                    % ax ay length string matrix ss -
  88. {
  89. 3 -1 roll pop
  90. 4 1 roll
  91.     {
  92.     2 npop (0) exch
  93.     2 copy 0 exch put pop
  94.     gsave
  95.     false charpath
  96.     currentpoint
  97.     4 index setmatrix
  98.     stroke
  99.     grestore
  100.     moveto
  101.     2 copy rmoveto
  102.     } exch cshow
  103. 3 npop
  104. } def
  105. % path operators
  106. /sp                    % ax ay length string sp -
  107. {
  108. exch pop
  109.     {
  110.     2 npop (0) exch
  111.     2 copy 0 exch put pop
  112.     false charpath
  113.     2 copy rmoveto
  114.     } exch cshow
  115. 2 npop
  116. } def
  117. % path construction operators
  118. /pl                    % x y pl x y
  119. {
  120. transform
  121. 0.25 sub round 0.25 add exch
  122. 0.25 sub round 0.25 add exch
  123. itransform
  124. } def
  125. /setstrokeadjust where
  126. {
  127. pop true setstrokeadjust
  128. /c                % x1 y1 x2 y2 x3 y3 c -
  129. {
  130. curveto
  131. } def
  132. /C
  133. /c load def
  134. /v                % x2 y2 x3 y3 v -
  135. {
  136. currentpoint 6 2 roll curveto
  137. } def
  138. /V
  139. /v load def
  140. /y                % x1 y1 x2 y2 y -
  141. {
  142. 2 copy curveto
  143. } def
  144. /Y
  145. /y load def
  146. /l                % x y l -
  147. {
  148. lineto
  149. } def
  150. /L
  151. /l load def
  152. /m                % x y m -
  153. {
  154. moveto
  155. } def
  156. }
  157. {
  158. /c
  159. {
  160. pl curveto
  161. } def
  162. /C
  163. /c load def
  164. /v
  165. {
  166. currentpoint 6 2 roll pl curveto
  167. } def
  168. /V
  169. /v load def
  170. /y
  171. {
  172. pl 2 copy curveto
  173. } def
  174. /Y
  175. /y load def
  176. /l
  177. {
  178. pl lineto
  179. } def
  180. /L
  181. /l load def
  182. /m
  183. {
  184. pl moveto
  185. } def
  186. } ifelse
  187. % graphic state operators
  188. /d                    % array phase d -
  189. {
  190. setdash
  191. } def
  192. /cf                    % - cf flatness
  193. currentflat def
  194. /i                    % flatness i -
  195. {
  196. dup 0 eq
  197.     {
  198.     pop cf
  199.     } if
  200. setflat
  201. } def
  202. /j                    % linejoin j -
  203. {
  204. setlinejoin
  205. } def
  206. /J                    % linecap J -
  207. {
  208. setlinecap
  209. } def
  210. /M                    % miterlimit M -
  211. {
  212. setmiterlimit
  213. } def
  214. /w                    % linewidth w -
  215. {
  216. setlinewidth
  217. } def
  218. % path painting operators
  219. /H                    % - H -
  220. {} def
  221. /h                    % - h -
  222. {
  223. closepath
  224. } def
  225. /N                    % - N -
  226. {
  227. newpath
  228. } def
  229. /n                    % - n -
  230. /N load def
  231. /F                    % - F -
  232. {
  233. _pf
  234. } def
  235. /f                    % - f -
  236. {
  237. closepath
  238. F
  239. } def
  240. /S                    % - S -
  241. {
  242. _ps
  243. } def
  244. /s                    % - s -
  245. {
  246. closepath
  247. S
  248. } def
  249. /B                    % - B -
  250. {
  251. gsave F grestore
  252. S
  253. } def
  254. /b                    % - b -
  255. {
  256. closepath
  257. B
  258. } def
  259. /W                    % - W -
  260. {
  261. clip
  262. } def
  263. % text painting operators
  264. /ta                    % length string ta ax ay length string
  265. {
  266. _as moveto
  267. _tt aload pop 4 -2 roll
  268. } def
  269. /tl                    % - tl -
  270. {
  271. _tl aload pop translate
  272. } def
  273. /as                    % - as array
  274. {
  275. {
  276. 0 0
  277. }
  278. {
  279. 2 copy _tt aload pop 4 -2 roll sw
  280. exch neg 2 div exch neg 2 div
  281. }
  282. {
  283. 2 copy _tt aload pop 4 -2 roll sw
  284. exch neg exch neg
  285. }
  286. {
  287. 0 0
  288. }
  289. } cvlit def
  290. /z                    % literal size leading tracking align z -
  291. {
  292. /_a exch ddef
  293. /_as as _a get ddef
  294. _a 2 le
  295.     {
  296.     0 _tt astore pop
  297.     0 exch neg _tl astore pop
  298.     }
  299.     {
  300.     0 exch neg _tt astore pop
  301.     neg 0 _tl astore pop
  302.     } ifelse
  303. exch findfont exch scalefont setfont
  304. } def
  305. /tm                    % matrix tm -
  306. {
  307. _tm currentmatrix pop
  308. concat
  309. } def
  310. /I                    % matrix I -
  311. {
  312. tm
  313. /t
  314.     {
  315.     ta sp
  316.     tl
  317.     } ddef
  318. } def
  319. /o                    % matrix o -
  320. {
  321. tm
  322. /t
  323.     {
  324.     ta 4 npop
  325.     tl
  326.     newpath
  327.     } ddef
  328. } def
  329. /e                    % matrix e -
  330. {
  331. tm
  332. /t
  333.     {
  334.     ta _psf
  335.     tl
  336.     newpath
  337.     } ddef
  338. } def
  339. /r                    % matrix r -
  340. {
  341. tm
  342. /t
  343.     {
  344.     ta _tm _pss
  345.     tl
  346.     newpath
  347.     } ddef
  348. } def
  349. /a                    % matrix a -
  350. {
  351. tm
  352. /t
  353.     {
  354.     2 copy
  355.     ta _psf
  356.     newpath
  357.     ta _tm _pss
  358.     tl
  359.     newpath
  360.     } ddef
  361. } def
  362. /T                    % - T -
  363. {
  364. _tm setmatrix
  365. } def
  366. % font operators
  367. /Z                    % array literal literal direction Z -
  368. {
  369. pop
  370. findfont begin
  371. currentdict dup length 1 add dict begin
  372.     {
  373.     1 index /FID ne
  374.         {
  375.         def
  376.         }
  377.         {
  378.         2 npop
  379.         } ifelse
  380.     } forall
  381. /FontName exch def dup length 0 ne
  382.     {
  383.     /Encoding Encoding 256 array copy def
  384.     0 exch
  385.         {
  386.         dup type /nametype eq
  387.             {
  388.             Encoding 2 index 2 index put pop
  389.             1 add
  390.             }
  391.             {
  392.             exch pop
  393.             } ifelse
  394.         } forall
  395.     } if pop
  396. currentdict dup end end
  397. /FontName get exch definefont pop
  398. } def
  399. % group operators
  400. /u                    % - u -
  401. {} def
  402. /U                    % - U -
  403. {} def
  404. /q                    % - q -
  405. {
  406. gsave
  407. } def
  408. /Q                    % - Q -
  409. {
  410. grestore
  411. } def
  412. % place operators
  413. /`                    % matrix llx lly urx ury string ` -
  414. {
  415. /_i save ddef
  416. 6 1 roll 4 npop
  417. concat
  418. userdict begin
  419. /showpage {} def
  420. false setoverprint
  421. pop
  422. } def
  423. /~                    % - ~ -
  424. {
  425. end
  426. _i restore
  427. } def
  428. % color operators
  429. /O                    % flag O -
  430. {
  431. 0 ne
  432. /_of exch ddef
  433. /_lp /none ddef
  434. } def
  435. /R                    % flag R -
  436. {
  437. 0 ne
  438. /_os exch ddef
  439. /_lp /none ddef
  440. } def
  441. /g                    % gray g -
  442. {
  443. /_gf exch ddef
  444. /_fc
  445. {
  446. _lp /fill ne
  447.     {
  448.     _of setoverprint
  449.     _gf setgray
  450.     /_lp /fill ddef
  451.     } if
  452. } ddef
  453. /_pf
  454. {
  455. _fc
  456. fill
  457. } ddef
  458. /_psf
  459. {
  460. _fc
  461. exch pop
  462. ashow
  463. } ddef
  464. /_lp /none ddef
  465. } def
  466. /G                    % gray G -
  467. {
  468. /_gs exch ddef
  469. /_sc
  470. {
  471. _lp /stroke ne
  472.     {
  473.     _os setoverprint
  474.     _gs setgray
  475.     /_lp /stroke ddef
  476.     } if
  477. } ddef
  478. /_ps
  479. {
  480. _sc
  481. stroke
  482. } ddef
  483. /_pss
  484. {
  485. _sc
  486. ss
  487. } ddef
  488. /_lp /none ddef
  489. } def
  490. /k                    % cyan magenta yellow black k -
  491. {
  492. _cf astore pop
  493. /_fc
  494. {
  495. _lp /fill ne
  496.     {
  497.     _of setoverprint
  498.     _cf aload pop setcmykcolor
  499.     /_lp /fill ddef
  500.     } if
  501. } ddef
  502. /_pf
  503. {
  504. _fc
  505. fill
  506. } ddef
  507. /_psf
  508. {
  509. _fc
  510. exch pop
  511. ashow
  512. } ddef
  513. /_lp /none ddef
  514. } def
  515. /K                    % cyan magenta yellow black K -
  516. {
  517. _cs astore pop
  518. /_sc
  519. {
  520. _lp /stroke ne
  521.     {
  522.     _os setoverprint
  523.     _cs aload pop setcmykcolor
  524.     /_lp /stroke ddef
  525.     } if
  526. } ddef
  527. /_ps
  528. {
  529. _sc
  530. stroke
  531. } ddef
  532. /_pss
  533. {
  534. _sc
  535. ss
  536. } ddef
  537. /_lp /none ddef
  538. } def
  539. /x                    % cyan magenta yellow black name gray x -
  540. {
  541. /_gf exch ddef
  542. findcmykcustomcolor
  543. /_if exch ddef
  544. /_fc
  545. {
  546. _lp /fill ne
  547.     {
  548.     _of setoverprint
  549.     _if _gf 1 exch sub setcustomcolor
  550.     /_lp /fill ddef
  551.     } if
  552. } ddef
  553. /_pf
  554. {
  555. _fc
  556. fill
  557. } ddef
  558. /_psf
  559. {
  560. _fc
  561. exch pop
  562. ashow
  563. } ddef
  564. /_lp /none ddef
  565. } def
  566. /X                    % cyan magenta yellow black name gray X -
  567. {
  568. /_gs exch ddef
  569. findcmykcustomcolor
  570. /_is exch ddef
  571. /_sc
  572. {
  573. _lp /stroke ne
  574.     {
  575.     _os setoverprint
  576.     _is _gs 1 exch sub setcustomcolor
  577.     /_lp /stroke ddef
  578.     } if
  579. } ddef
  580. /_ps
  581. {
  582. _sc
  583. stroke
  584. } ddef
  585. /_pss
  586. {
  587. _sc
  588. ss
  589. } ddef
  590. /_lp /none ddef
  591. } def
  592. % locked object operators
  593. /A                    % value A -
  594. {
  595. pop
  596. } def
  597. currentdict readonly pop end
  598. setpacking
  599. %%EndProcSet
  600.